home *** CD-ROM | disk | FTP | other *** search
/ Horoscope Companion: Gemini / Horoscope Companion: Gemini.iso / pc / gemini / cfb.dir / Internal_2.ls < prev    next >
Encoding:
Text File  |  1996-10-08  |  298 b   |  11 lines
  1. on mouseUp
  2.   global gFortuneSelected, gGoodOrBadSelectionSprite, gFortuneSelectionSprite
  3.   cursor(4)
  4.   if gFortuneSelected = 1 then
  5.     puppetSprite(gGoodOrBadSelectionSprite, 0)
  6.     puppetSprite(gFortuneSelectionSprite, 0)
  7.     set gFortuneSelected to 0
  8.   end if
  9.   play frame "pull the handle"
  10. end
  11.